% -------------------------------------------------------------------------
% 画转移轨道
%
% Copyright(C) 2015/04/29 by Chen Zhang, 
% School of Astronautics, Beihang University
% chenzhang.buaa@gmail.com
% -------------------------------------------------------------------------
function handle = plot_x0(x0 , type, auxdata)
mu = auxdata.mu;
options = odeset('AbsTol' , 1e-10 , 'RelTol' , 1e-10);
[tt , yy] = ode113(@f4y , [x0(5) , x0(6)] , x0(1:4) , options , auxdata);
handle = plot(yy(: , 1) , yy(: , 2) , type , 'LineWidth' , 2); hold on; % 画轨道
axis equal;
end
